home *** CD-ROM | disk | FTP | other *** search
/ Data Base of the Video Yearbook 1995 / Data Base of the Video Yearbook 1995 - Disc 1.iso / cosmos / aiuew.dir / 00044.ls < prev    next >
Encoding:
Text File  |  1995-12-21  |  215 b   |  10 lines
  1. on tgyou gyou
  2.   global sdata, taidata
  3.   set gyoukazu to the number of items in gyou
  4.   set taidata to EMPTY
  5.   repeat with n = 1 to gyoukazu
  6.     searchdatat(item n of gyou)
  7.   end repeat
  8.   tkensaku(item 1 of gyou)
  9. end
  10.